﻿Imports System
Imports System.Web
Imports System.Web.UI
Imports DotNetNuke
Namespace NVPortal.Modules.NVNews

    Public MustInherit Class _View
        Inherits Entities.Modules.PortalModuleBase

#Region "Controls"
#End Region

#Region "Event Handlers"
        Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            '
            If Not IsPostBack Then
                Try
                    BindGridData()
                Catch ex As Exception
                    ProcessModuleLoadException(Me, ex)
                End Try
            End If
        End Sub
#End Region

        Private Sub BindGridData()
            Dim ctlMSbanner As New TacGiaController
            Me.drgViewData.DataSource = ctlMSbanner.TacGia_GetAll()
            Me.drgViewData.DataBind()
        End Sub

        Private Sub lbtAddBottom_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbtAddBottom.Click, lbtAddTop.Click
            Try
                Response.Redirect("/tabid/" & TabId & "/view/add/Default.aspx", True)
            Catch exc As Exception    'Module failed to load
                ProcessModuleLoadException(Me, exc)
            End Try
        End Sub
    End Class

End Namespace
